home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 4 / developer source - volume 4.iso / parad / jan94 / btfig04b.gif

< prev

next >

Graphics Interchange Format  |  1996-07-01  |  41KB  |  479x359  |  4-bit (15 colors)

Labels: text | display | screenshot | software | parallel | number
OCR: adox for Windows File Edit Language Debug Properties Window Help Førin Design : INCSACH.FSL3 tobject Name to find Name to find Name INCSRCH:#Field14 .; keyPhysical" CUSTOMER Signe [A30) method keyPhysical(war eventinfo KeyEvent) doDefault if eventInfo.vChar() = "UK RETURN" OF event Info.vchar() = "UK TAD" then ui.resync(tc) ui.moveTo() INCSRCH Field1 d"open" e150 if eventInfo.char() and method open(var eventinfo Event) event Info.char() <> >> - - then doDefault if not to. locatePattern(srchField, self.value=" .. ") then beep() ui.attach ( Hane) ui.resync(tc) sechField = "Hane" ui , moveTo() INCSRCH:#Field14:Vart ignoreCaseinLocate( Yes) endIf var toFind String tc.attach(uf) endIf srchField String te TCursor endMethod endMethod UIObject encuar + Line: 9 Cal Lines Col: 1

---